home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / clue.lha / clue / doc / clue.tex / node135_mn.html < prev    next >
Text File  |  1989-07-12  |  1KB  |  39 lines

  1.  
  2. <H3><A ID="SECTION003911100000000000000"><tex2html_anchor_invisible_mark></A> <A ID="ch:event-loop"><tex2html_anchor_mark></A><BR>
  3. The Event Loop
  4. </H3><#5058#>
  5.            
  6.       
  7.  
  8. The <#1594#><TT>process-next-event</TT><#1594#> function implements the body of the application event
  9. loop.<A ID="1595"><tex2html_anchor_invisible_mark></A>
  10. <#1596#><TT>process-next-event</TT><#1596#> reads an input
  11. event from a <#1597#><TT>contact-display</TT><#1597#> and
  12. dispatches it for processing.
  13. Using this function, a typical application event loop will have the form shown
  14. below.<A ID="1598"><tex2html_anchor_invisible_mark></A> 
  15. <#4313#>
  16.  
  17. <P>
  18. <PRE><tex2html_verbatim_mark>verbatim187#</PRE>
  19.  
  20. <P>
  21. The event loop should be terminated by a <#1601#><TT>throw</TT><#1601#> to an application-defined 
  22. <#1602#><TT>loop-exit-tag</TT><#1602#>.<A ID="1603"><tex2html_anchor_invisible_mark></A>
  23.  
  24. <P>
  25. <#4314#><FONT SIZE="+1"><#1604#><B>process-next-event Function, contact-display</B><#1604#></FONT><#4314#>
  26. <A ID="1605"><tex2html_anchor_invisible_mark></A>
  27. <A ID="1606"><tex2html_anchor_invisible_mark></A>
  28. <DIV class="RIGHT">
  29. <tex2html_image_mark>#tex2html_wrap_inline10004#
  30. </DIV>
  31.  
  32. <P>
  33. <DIV class="RIGHT">
  34. <tex2html_image_mark>#tex2html_wrap_inline10005#
  35. </DIV>
  36.  
  37. <P>
  38.  
  39.  =0 <#5068#>=0 <#5072#>